آموزش کار با actskin4.ocx

خوب آنقدر عجله داشتم یادم رفت آموزش پست پایین رو بزارم... به روش زیره...

اگه میخواهید همراه با لود شدن فرم Skin به فرم اظافه بشه..

باید اولا Ocx رو باز کنید و روی فرم قرار دهید ودستور زیر را در فرم لود بنویسید

Private Sub Form_Load()
                Skin1.LoadSkin App.Path & "\office2007.skn"
Skin1.ApplySkin Me.hWnd
End Sub

اگه می خواهید کاربر Skin را انتخاب کند به روش زیر عمل کنید....

On Error Resume Next
CD.Filter = "Skin File(*.Skn)|*.skn;|"
CD.ShowOpen
Skin1.LoadSkin CD.FileName
Skin1.ApplySkin Me.hWnd

موفق باشید....

اسکین در ویژال بیسیک

باید از Ocx زیر استفاده کنید...

دانلود Ocx با حجم 164 کیلوبایت

مجموعه ای از اسکین های این Ocx تصاویر زیر...

دانلود اسکین های بالا حجم 477 کیلو بایت

رمز تمامی فایل ها : vb6